home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / gnu / glibc108.zip / glibc108 / hurd / intr_rpc.awk < prev    next >
Text File  |  1992-09-16  |  517b  |  29 lines
  1. # Icky intimate knowledge of MiG output.
  2.  
  3. BEGIN { args=""; argsnext=0; echo=1; print "#include <hurd.h>"; }
  4.  
  5. $NF == rpc \
  6.   {
  7.     for (i = 1; i < NF; ++i) printf "%s ", $i;
  8.     print call;
  9.     next;
  10.   }
  11.  
  12. args == "" && $1 == "#else" { argsnext=1; print $0; next; }
  13.  
  14. argsnext == 1 { args=$0; firstarg=substr($1, 2, length($1)-2); }
  15.  
  16. { argsnext=0; }
  17.  
  18. /^{/ { echo=0; }
  19.  
  20. echo == 1 { print $0; }
  21.  
  22. /^}/ \
  23.   {
  24.     print "{";
  25.     print "  return HURD_EINTR_RPC (" firstarg ", " rpc args ");";
  26.     print "}";
  27.     echo = 1;
  28.   }
  29.